home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / game_224.swf / scripts / frame_67 / DoAction.as
Text File  |  2006-01-17  |  703b  |  20 lines
  1. tellTarget("_level0/PlayerCard0" add eval("_level0:WhereAmI") add "/Card0" add eval("_level0:NewCard"))
  2. {
  3.    gotoAndStop(random("52") + "2");
  4. }
  5. setProperty("_level0/PlayerCard0" add eval("_level0:WhereAmI") add "/Card0" add eval("_level0:NewCard"), _visible, "1");
  6. call("_level0:CheckValues");
  7. if("21" < eval("/PileInfo0" add eval("/:WhereAmI") add ":Cval"))
  8. {
  9.    set("/PileInfo0" add eval("/:WhereAmI") add ":t1",eval("/PileInfo0" add eval("/:WhereAmI") add ":Cval") add ", Busted");
  10.    set("/:AllowCard","0");
  11.    set("/:Busted",eval("/:Busted") + "1");
  12.    call("/:Stand");
  13. }
  14. else
  15. {
  16.    set("_level0:NewCard",eval("_level0:NewCard") + "1");
  17. }
  18. call("Checkdouble");
  19. call("checksplit");
  20.